home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Best of Shareware
/
Best of PC Windows Shareware 1.0 - Wayzata Technology (7111) (1993).iso
/
mac
/
ZIPPED
/
DOS
/
GRAPHICS
/
RAYSH386.ZIP
/
SRC
/
MOUNT.C
< prev
next >
Wrap
C/C++ Source or Header
|
1992-04-28
|
2KB
|
69 lines
/*
* mount.c
*
* Copyright (C) 1989, 1991, Craig E. Kolb
* All rights reserved.
*
* This software may be freely copied, modified, and redistributed
* provided that this copyright notice is preserved on all copies.
*
* You may not distribute this software, in whole or in part, as part of
* any commercial product without the express consent of the authors.
*
* There is no warranty or other guarantee of fitness of this software
* for any purpose. It is provided solely "as is".
*
* $Id: mount.c,v 4.0 91/07/17 14:43:17 kolb Exp Locker: kolb $
*
* $Log: mount.c,v $
* Revision 4.0 91/07/17 14:43:17 kolb
* Initial version.
*
*/
#include "texture.h"
#include "mount.h"
/*
* Create and return a reference to a "mount" texture.
*/
Mount *
MountCreate(cmap, turb, slope)
char *cmap;
Float turb, slope;
{
Mount *mount;
mount = (Mount *)RayMalloc(sizeof(Mount));
mount->turb = turb;
mount->slope = slope;
mount->cmap = ColormapRead(cmap);
return mount;
}
/*
* Apply a "mount" texture.
*/
void
MountApply(mount, prim, ray, pos, norm, gnorm, surf)
Mount *mount;
Geom *prim;
Ray *ray;
Vector *pos, *norm, *gnorm;
Surface *surf;
{
int index;
Float t;
Color c;
t = Chaos(pos, 7);
index = (pos->z + mount->turb*t - mount->slope*(1.-norm->z))*256;
if (index < 0)
index = 0;
if (index > 255)
index = 255;
ColorMultiply(surf->amb, mount->cmap[index], &surf->amb);
ColorMultiply(surf->diff, mount->cmap[index], &surf->diff);
ColorMultiply(surf->spec, mount->cmap[index], &surf->spec);
}